function [vert_hist hor_hist] = histogram(im)
    %%%%%%%%%%%%%SIMI%%%%%%%%
%     X tomb
    %vert_hist: soronkenti hisztogram, azaz egy kep-magassag meretu
            %tomb, amelynek elemei a sorok osszegei
    %hor_hist: oszloponkenti hisztrogram, azaz egy kep-szelesseg meretu
            %tomb, amelynek elemei az oszlopok osszegei

   
vert_hist=sum(im,2);
hor_hist=sum(im,1);
end